home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ WinXP System Restore 2.xpl < prev    next >
Text File  |  2003-12-06  |  2KB  |  45 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH"="System\System Restore"
  5. "NAME"="Enable System Restore"
  6. "VERSION"="1.01"
  7. "OSVERSION"="0000011"
  8. "WARNING"="1"
  9. "LANGUAGE"="VBScript"
  10. "TEXT 1"="Enable System Restore"
  11. "DESCRIPTION 1"="The System Restore service allows you to set checkpoints at any time which are basically a "Snapshot" of your system at the time the checkpoint (snapshot) was taken."
  12. "DESCRIPTION 2"="Windows also uses this service internally, for example when you install new drivers. If the driver installation fails, you can use the checkpoint before the installation to roll back your system to the time before the driver installation. "
  13. "DESCRIPTION 3"="If this setting is disabled, Windows will NOT use the System Restore Service and thus no checkpoints will be created."
  14. "DESCRIPTION 4"="Disabling this setting will disable System Restore! 
  15. "AUTHOR"="Xteq Systems"
  16. "CONTACTURL"="http://www.xteq.com"
  17. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  18. "COMMENT 1"="From WinNT Magazin - contributed by David Chernicoff, david@winnetmag.com"
  19. "COMMENT 2"="See also: Q295659"
  20.  
  21. sV1="HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SystemRestore\DisableSR" 'DW
  22.  
  23.  
  24. Sub Plugin_Initialize 
  25.   if RegReadValue(sV1)<>1 then 
  26.      Call SetUIElement(1,true)
  27.   end if
  28. End Sub
  29.  
  30. Sub Plugin_CheckData(ElementIndex)
  31. End Sub
  32.  
  33. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  34.  if GetUIElement(1)=true then
  35.     Call RegWriteValue(sV1,0,2)
  36.  else
  37.     Call RegWriteValue(sV1,1,2)
  38.  end if
  39.  
  40.  Call Restart()
  41. End Sub
  42.  
  43. Sub Plugin_Terminate 
  44. End Sub
  45.